﻿Public Class OLE_PPS_FILE
    Inherits OLE_PPS

    Public TmpDir As String

    Public Sub New(ByVal Name As String)
        MyBase.New(Nothing, Name, 2, Nothing, Nothing, Nothing, Nothing, Nothing, "", Nothing)
        TmpDir = System.IO.Path.GetTempPath
    End Sub
End Class
